/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / demos / _the4th / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 30 39 36 |@0000900|0,000096|
|00000040| 33 38 00 73 38 96 00 00 | 88 86 00 00 38 06 00 00 |38.s8...|....8...|
|00000050| 0d 00 00 3f f4 3e 73 63 | 73 69 3a 3a 34 2e 24 2e |...?.>sc|si::4.$.|
|00000060| 44 49 46 46 45 52 45 4e | 54 2e 54 72 61 6e 73 66 |DIFFEREN|T.Transf|
|00000070| 65 72 2e 46 52 49 45 4e | 44 53 48 49 50 2e 21 54 |er.FRIEN|DSHIP.!T|
|00000080| 68 65 34 74 68 2e 21 52 | 75 6e 49 6d 61 67 65 0d |he4th.!R|unImage.|
|00000090| 00 32 1b ee 20 85 20 f1 | 20 22 20 61 74 20 6c 69 |.2.. . .| " at li|
|000000a0| 6e 65 20 2e 20 22 3b 9e | 3a e0 0d 00 46 11 41 70 |ne . ";.|:...F.Ap|
|000000b0| 70 24 3d 22 54 68 65 34 | 74 68 22 0d 00 64 19 53 |p$="The4|th"..d.S|
|000000c0| 70 72 69 74 65 6e 61 6d | 65 24 3d 22 21 74 68 65 |pritenam|e$="!the|
|000000d0| 34 74 68 22 0d 00 78 0f | 77 68 61 6e 64 6c 65 25 |4th"..x.|whandle%|
|000000e0| 3d 2d 32 0d 00 aa 1a de | 20 62 6c 6f 63 6b 25 20 |=-2.....| block% |
|000000f0| 26 31 30 30 2c 6d 65 6e | 75 25 20 35 31 0d 00 c8 |&100,men|u% 51...|
|00000100| 0b 65 78 69 74 25 3d a3 | 0d 00 e6 0f f2 69 6e 69 |.exit%=.|.....ini|
|00000110| 74 69 61 6c 69 73 65 0d | 00 fa 0e ee 20 85 20 f2 |tialise.|.... . .|
|00000120| 65 72 72 6f 72 0d 01 18 | 05 f5 0d 01 22 09 f2 70 |error...|...."..p|
|00000130| 6f 6c 6c 0d 01 2c 0d fd | 20 65 78 69 74 25 3d b9 |oll..,..| exit%=.|
|00000140| 0d 01 36 16 c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |..6..."W|imp_Clos|
|00000150| 65 44 6f 77 6e 22 0d 01 | 40 05 e0 0d 01 54 11 dd |eDown"..|@....T..|
|00000160| 20 f2 69 6e 69 74 69 61 | 6c 69 73 65 0d 01 90 2a | .initia|lise...*|
|00000170| c8 99 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |.."Wimp_|Initiali|
|00000180| 73 65 22 2c 32 30 30 2c | 26 34 62 35 33 34 31 35 |se",200,|&4b53415|
|00000190| 34 2c 41 70 70 24 0d 01 | b8 18 62 6c 6f 63 6b 25 |4,App$..|..block%|
|000001a0| 21 30 3d 77 68 61 6e 64 | 6c 65 25 3a 20 20 0d 01 |!0=whand|le%:  ..|
|000001b0| c2 18 62 6c 6f 63 6b 25 | 21 34 3d 30 3a 20 20 20 |..block%|!4=0:   |
|000001c0| 20 20 20 20 20 20 0d 01 | cc 18 62 6c 6f 63 6b 25 |      ..|..block%|
|000001d0| 21 38 3d 30 3a 20 20 20 | 20 20 20 20 20 20 0d 01 |!8=0:   |      ..|
|000001e0| d6 18 62 6c 6f 63 6b 25 | 21 31 32 3d 36 38 3a 20 |..block%|!12=68: |
|000001f0| 20 20 20 20 20 20 0d 01 | e0 18 62 6c 6f 63 6b 25 |      ..|..block%|
|00000200| 21 31 36 3d 36 38 3a 20 | 20 20 20 20 20 20 0d 01 |!16=68: |      ..|
|00000210| ea 19 62 6c 6f 63 6b 25 | 21 32 30 3d 26 33 30 31 |..block%|!20=&301|
|00000220| 41 3a 20 20 20 20 20 0d | 02 08 1f 24 28 62 6c 6f |A:     .|...$(blo|
|00000230| 63 6b 25 2b 32 34 29 3d | 53 70 72 69 74 65 6e 61 |ck%+24)=|Spritena|
|00000240| 6d 65 24 2b bd 30 0d 02 | 1c 2d c8 99 22 57 69 6d |me$+.0..|.-.."Wim|
|00000250| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00000260| 6c 6f 63 6b 25 20 b8 20 | 69 63 6f 6e 68 61 6e 64 |lock% . |iconhand|
|00000270| 6c 65 25 0d 02 3a 17 24 | 6d 65 6e 75 25 3d 22 54 |le%..:.$|menu%="T|
|00000280| 41 53 20 44 65 6d 6f 20 | 34 22 0d 02 44 0e 6d 65 |AS Demo |4"..D.me|
|00000290| 6e 75 25 3f 31 32 3d 37 | 0d 02 4e 0e 6d 65 6e 75 |nu%?12=7|..N.menu|
|000002a0| 25 3f 31 33 3d 32 0d 02 | 58 0e 6d 65 6e 75 25 3f |%?13=2..|X.menu%?|
|000002b0| 31 34 3d 37 0d 02 62 0e | 6d 65 6e 75 25 3f 31 35 |14=7..b.|menu%?15|
|000002c0| 3d 30 0d 02 6c 33 e7 20 | a9 28 41 70 70 24 29 3e |=0..l3. |.(App$)>|
|000002d0| 34 20 8c 20 6d 65 6e 75 | 63 68 61 72 73 25 3d a9 |4 . menu|chars%=.|
|000002e0| 28 41 70 70 24 29 20 8b | 20 6d 65 6e 75 63 68 61 |(App$) .| menucha|
|000002f0| 72 73 25 3d 34 0d 02 76 | 1d 6d 65 6e 75 25 21 31 |rs%=4..v|.menu%!1|
|00000300| 36 3d 31 32 2b 31 36 2a | 6d 65 6e 75 63 68 61 72 |6=12+16*|menuchar|
|00000310| 73 25 0d 02 80 1a 6d 65 | 6e 75 25 21 32 30 3d 34 |s%....me|nu%!20=4|
|00000320| 34 3a 6d 65 6e 75 25 21 | 32 34 3d 30 0d 02 8a 1c |4:menu%!|24=0....|
|00000330| 6d 65 6e 75 25 21 32 38 | 3d 31 32 38 3a 6d 65 6e |menu%!28|=128:men|
|00000340| 75 25 21 33 32 3d 2d 31 | 0d 02 94 15 6d 65 6e 75 |u%!32=-1|....menu|
|00000350| 25 21 33 36 3d 26 37 30 | 30 39 30 33 31 0d 02 9e |%!36=&70|09031...|
|00000360| 19 24 28 6d 65 6e 75 25 | 2b 34 30 29 3d 22 51 75 |.$(menu%|+40)="Qu|
|00000370| 69 74 22 2b bd 30 0d 02 | a8 05 e1 0d 02 bc 0c dd |it"+.0..|........|
|00000380| 20 a4 65 72 72 6f 72 0d | 02 c6 0d 21 62 6c 6f 63 | .error.|...!bloc|
|00000390| 6b 25 3d 9f 0d 02 d0 2f | 24 28 62 6c 6f 63 6b 25 |k%=..../|$(block%|
|000003a0| 2b 34 29 3d f6 24 2b 22 | 20 20 28 45 72 72 6f 72 |+4)=.$+"|  (Error|
|000003b0| 20 63 6f 64 65 20 22 2b | c3 28 9e 29 2b 22 29 22 | code "+|.(.)+")"|
|000003c0| 2b bd 30 0d 02 da 31 c8 | 99 22 57 69 6d 70 5f 52 |+.0...1.|."Wimp_R|
|000003d0| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 62 6c 6f 63 |eportErr|or",bloc|
|000003e0| 6b 25 2c 33 2c 41 70 70 | 24 20 b8 20 2c 61 6e 73 |k%,3,App|$ . ,ans|
|000003f0| 77 65 72 25 0d 02 e4 13 | e7 20 61 6e 73 77 65 72 |wer%....|. answer|
|00000400| 25 3d 32 20 8c 20 e0 0d | 02 ee 05 e1 0d 03 02 0b |%=2 . ..|........|
|00000410| dd 20 f2 70 6f 6c 6c 0d | 03 0c 28 c8 99 22 57 69 |. .poll.|..(.."Wi|
|00000420| 6d 70 5f 50 6f 6c 6c 22 | 2c 26 31 38 33 31 2c 62 |mp_Poll"|,&1831,b|
|00000430| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|00000440| 03 16 10 c8 8e 20 72 65 | 61 73 6f 6e 25 20 ca 0d |..... re|ason% ..|
|00000450| 03 20 13 c9 20 36 3a f2 | 6d 6f 75 73 65 63 6c 69 |. .. 6:.|mousecli|
|00000460| 63 6b 0d 03 2a 0f c9 20 | 39 3a 65 78 69 74 25 3d |ck..*.. |9:exit%=|
|00000470| b9 0d 03 34 14 c9 20 31 | 37 2c 31 38 3a f2 6d 65 |...4.. 1|7,18:.me|
|00000480| 73 73 61 67 65 0d 03 3e | 05 cb 0d 03 48 05 e1 0d |ssage..>|....H...|
|00000490| 03 5c 11 dd 20 f2 6d 6f | 75 73 65 63 6c 69 63 6b |.\.. .mo|useclick|
|000004a0| 0d 03 66 11 c8 8e 20 62 | 6c 6f 63 6b 25 21 38 20 |..f... b|lock%!8 |
|000004b0| ca 0d 03 70 32 c9 20 32 | 3a c8 99 22 57 69 6d 70 |...p2. 2|:.."Wimp|
|000004c0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 65 |_CreateM|enu",,me|
|000004d0| 6e 75 25 2c 62 6c 6f 63 | 6b 25 21 30 2d 36 38 2c |nu%,bloc|k%!0-68,|
|000004e0| 31 34 30 0d 03 7a 1b c9 | 20 34 3a f2 61 63 74 69 |140..z..| 4:.acti|
|000004f0| 6f 6e 28 b9 2c a3 2c a3 | 2c 30 2c 22 22 29 0d 03 |on(.,.,.|,0,"")..|
|00000500| 84 05 cb 0d 03 8e 05 e1 | 0d 03 a2 0e dd 20 f2 6d |........|..... .m|
|00000510| 65 73 73 61 67 65 0d 03 | ac 12 c8 8e 20 62 6c 6f |essage..|.... blo|
|00000520| 63 6b 25 21 31 36 20 ca | 0d 03 b6 0f c9 20 30 3a |ck%!16 .|..... 0:|
|00000530| 65 78 69 74 25 3d b9 0d | 03 c0 07 c9 20 33 0d 03 |exit%=..|.... 3..|
|00000540| ca 22 70 61 74 68 6e 61 | 6d 65 24 3d 22 22 3a 63 |."pathna|me$="":c|
|00000550| 6f 75 6e 74 65 72 3d 62 | 6c 6f 63 6b 25 2b 34 34 |ounter=b|lock%+44|
|00000560| 0d 03 d4 0f c8 95 20 3f | 63 6f 75 6e 74 65 72 0d |...... ?|counter.|
|00000570| 03 de 18 70 61 74 68 6e | 61 6d 65 24 2b 3d bd 3f |...pathn|ame$+=.?|
|00000580| 63 6f 75 6e 74 65 72 0d | 03 e8 10 63 6f 75 6e 74 |counter.|...count|
|00000590| 65 72 2b 3d 31 3a ce 0d | 03 f2 13 74 79 70 65 25 |er+=1:..|...type%|
|000005a0| 3d 62 6c 6f 63 6b 25 21 | 34 30 0d 03 fc 36 f2 61 |=block%!|40...6.a|
|000005b0| 63 74 69 6f 6e 28 a3 2c | 74 79 70 65 25 3d 26 31 |ction(.,|type%=&1|
|000005c0| 30 30 30 2c 74 79 70 65 | 25 3d 26 32 30 30 30 2c |000,type|%=&2000,|
|000005d0| 74 79 70 65 25 2c 70 61 | 74 68 6e 61 6d 65 24 29 |type%,pa|thname$)|
|000005e0| 0d 04 06 05 cb 0d 04 10 | 05 e1 0d 04 24 34 dd 20 |........|....$4. |
|000005f0| f2 61 63 74 69 6f 6e 28 | 63 6c 69 63 6b 25 2c 64 |.action(|click%,d|
|00000600| 69 72 25 2c 61 70 70 6c | 25 2c 66 69 6c 65 74 79 |ir%,appl|%,filety|
|00000610| 70 65 25 2c 70 61 74 68 | 6e 61 6d 65 24 29 0d 04 |pe%,path|name$)..|
|00000620| 2e 20 c8 99 22 57 69 6d | 70 5f 43 6f 6d 6d 61 6e |. .."Wim|p_Comman|
|00000630| 64 57 69 6e 64 6f 77 22 | 2c 6d 65 6e 75 25 0d 04 |dWindow"|,menu%..|
|00000640| 4c 25 e7 20 63 6c 69 63 | 6b 25 20 8c 20 ff 22 52 |L%. clic|k% . ."R|
|00000650| 75 6e 20 3c 4f 62 65 79 | 24 44 69 72 3e 2e 43 6f |un <Obey|$Dir>.Co|
|00000660| 64 65 22 0d 04 60 1c c8 | 99 22 57 69 6d 70 5f 43 |de"..`..|."Wimp_C|
|00000670| 6f 6d 6d 61 6e 64 57 69 | 6e 64 6f 77 22 2c 30 0d |ommandWi|ndow",0.|
|00000680| 04 6a 05 e1 0d ff       |                         |.j....  |        |
+--------+-------------------------+-------------------------+--------+--------+